home *** CD-ROM | disk | FTP | other *** search
/ The Complete Work of Mahatma Gandhi / The Complete Work of Mahatma Gandhi-CD interactive.iso / mac / Ganmac / eb.cst / 00168_Script_vidvolume < prev    next >
Text File  |  1999-09-22  |  2KB  |  61 lines
  1. on mouseUp
  2.   --  Volume Control
  3.   global gvolume,handcur, vlocH, vlocV
  4.   set xx to the clickOn
  5.   if xx > 0 then
  6.     global cspname
  7.     set yy to chars(cspname,1,1)
  8.     checkvol yy
  9.     global gloson
  10.     if (gloson=1) or (the visible of window "gloss"=TRUE) then
  11.       set the memberNum of sprite 115 to the number of member (yy&"glos") of castLib "eb.cst"
  12.       endNewMovie
  13.     end if
  14.     if the visible of sprite 106 = false then
  15.       checkvol yy
  16.       
  17.       set mm to the name of member (the memberNum of sprite xx) of castLib "eb.cst"
  18.       set the memberNum of sprite xx to the number of member ("r"&mm) of castLib "eb.cst"
  19.       set the movierate of sprite 6 to 0
  20.       set the visible of sprite 5 to false
  21.       set vlocH to the locH of sprite 98
  22.       set vlocV to the locV of sprite 98
  23.       set the locH of sprite 98 to -100
  24.       set the locV of sprite 98 to -100
  25.       set the visible of sprite 98 to false
  26.       updateStage
  27.       set the visible of sprite 101 to false
  28.       set the visible of sprite 102 to false
  29.       set the visible of sprite 106 to true
  30.       set the visible of sprite 107 to true
  31.       set the visible of sprite 108 to true
  32.       CHASPCURSOR handcur,106,108
  33.       updateStage
  34.     else
  35.       set ii to the name of member (the memberNum of sprite xx) of castLib "eb.cst"
  36.       set mm to chars(ii,2,6)
  37.       set the memberNum of sprite xx to the number of member mm 
  38.       
  39.       set the visible of sprite 5 to true
  40.       set the visible of sprite 98 to true
  41.       set the visible of sprite 101 to true
  42.       set the visible of sprite 102 to true
  43.       set wm to the name of member (the memberNum of sprite 101) of castLib "eb.cst"
  44.       if wm = "play" then
  45.         nothing 
  46.       else
  47.         set the movierate of sprite 6 to 1
  48.       end if
  49.       set the locH of sprite 98 to vlocH
  50.       set the locV of sprite 98 to vlocV
  51.       set the visible of sprite 106 to false
  52.       set the visible of sprite 107 to false
  53.       set the visible of sprite 108 to false
  54.       CHASPCURSOR -1,106,108
  55.       updateStage
  56.     end if
  57.     
  58.   end if
  59.   
  60. end
  61.